home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwlt16.dir / 00032_Script_32 < prev    next >
Text File  |  1994-11-15  |  5KB  |  200 lines

  1. on startMovie
  2.   global inFrame, nowFrame, currMM
  3.   global dialogOn, nextLT, prevLT
  4.   cursor 4
  5.   set the preLoadRAM to 420
  6.   set prevLT = "FLWLT15"
  7.   set nextLT = "FLWLT17"
  8.   set dialogOn = FALSE
  9.   set currMM = "FLWMM"
  10.   set nowFrame = "ltuso930000°°°"
  11.   set inFrame = ""
  12.   puppetsprite 9, TRUE
  13.   puppetSprite 11, TRUE
  14.   puppetSprite 12, TRUE
  15.   set the immediate of sprite 11 to TRUE
  16.   set the immediate of sprite 12 to TRUE
  17.   puppetSprite 20, TRUE
  18.   puppetSprite 21, TRUE
  19.   puppetSprite 22, TRUE
  20.   puppetSprite 23, TRUE
  21.   set the immediate of sprite 20 to TRUE
  22.   set the immediate of sprite 23 to TRUE 
  23. end startMovie
  24.  
  25. on stepMovie
  26.   global nowFrame,currFrame
  27.   if nowFrame <> currFrame then
  28.     seeAlsoList
  29.     set currFrame = nowFrame
  30.   end if
  31. end stepMovie
  32.  
  33. on stopMovie
  34.   put " " into field "seeAlsoText"
  35.   set the castNum of sprite 21 to 1050
  36.   puppetSprite 21, FALSE
  37.   updateStage
  38. end stopMovie
  39.  
  40. on saveLocals
  41.   global lastFrame, nowFrame, lastMovie, origLocH
  42.   set lastMovie = the movie
  43.   set lastFrame = nowFrame
  44. end saveLocals
  45.  
  46. on ltForStep
  47.   global inFrame, nextLT, ltQT
  48.   puppetSprite 4, FALSE
  49.   set ltQT = FALSE
  50.   set inFrame = ""
  51.   if the frame = 14 then
  52.     go to frame "ltuso933001°°°" of movie nextLT
  53.   else
  54.     go to marker (+1)
  55.     updateStage
  56.   end if
  57. end ltForStep
  58.  
  59. on ltBackStep
  60.   global inFrame, prevLT, ltQT
  61.   puppetSprite 4, FALSE
  62.   set ltQT = FALSE
  63.   set inFrame = ""
  64.   if the frame < 6 then
  65.     go to frame "ltexo927005°°°" of movie prevLT
  66.   else
  67.     go to marker (-1)
  68.     updateStage
  69.   end if
  70. end ltBackStep
  71.  
  72. on checkNav
  73.   if rollover(12) then
  74.     set the castNum of sprite 12 to the number of cast "leftUp"
  75.   else
  76.     set the castNum of sprite 12 to the number of cast "leftRt"
  77.   end if
  78.   
  79.   if rollover(11) then
  80.     set the castNum of sprite 11 to the number of cast "rightUp"
  81.   else
  82.     set the castNum of sprite 11 to the number of cast "rightRt"
  83.   end if
  84.   updateStage
  85.   cursor -1
  86. end checkNav
  87.  
  88. on buttonState
  89.   global FrankNav, bflag, nowFrame, noTx, dialogOn
  90.   
  91.   if dialogOn = FALSE then
  92.     
  93.     --sticking local call here for convenience
  94.     worldLite
  95.     if the mouseV > 200 or bFlag = TRUE then
  96.       set bFlag = FALSE
  97.       doState
  98.     end if
  99.   end if
  100. end buttonState
  101.  
  102. on scrollRight
  103.   if the clickon = 11 then
  104.     sound stop 1
  105.     startTimer
  106.     repeat while the timer < 2
  107.       set the castNum of sprite 11 to the number of cast "rightDn"
  108.       updateStage
  109.     end repeat
  110.     timeRight
  111.     flush
  112.   end if   
  113. end scrollRight
  114.  
  115. on scrollLeft
  116.   if the clickon = 12 then
  117.     sound stop 1
  118.     startTimer
  119.     repeat while the timer < 2
  120.       set the castNum of sprite 12 to the number of cast "leftDn"
  121.       updateStage
  122.     end repeat
  123.     timeLeft
  124.     flush
  125.   end if  
  126. end scrollLeft
  127.  
  128. on timeLeft
  129.   global prevLt
  130.   go to movie prevLT
  131. end timeLeft
  132.  
  133. on timeRight
  134.   global nextLt
  135.   go to movie nextLT
  136. end timeRight
  137.  
  138. on worldLite
  139.   set the castNum of sprite 9 to 2
  140.   if rollover(9) then
  141.     set the castNum of sprite 9 to 31
  142.   end if
  143. end worldLite
  144.  
  145. on rollVLB16
  146.   if the mouseH > 168 and the mouseH < 286 and the mouseV > 75 and the mouseV < 154 then
  147.     set the castNum of sprite 4 to 9
  148.     if the mouseDown then 
  149.       set the castNum of sprite 4 to 3
  150.     end if
  151.   else if the mouseH > 273 and the mouseH < 392 and the mouseV > 148 and the mouseV < 225 then
  152.     set the castNum of sprite 4 to 10
  153.     if the mouseDown then 
  154.       set the castNum of sprite 4 to 3
  155.     end if
  156.   else if the mouseH > 380 and the mouseH < 486 and the mouseV > 75 and the mouseV < 161 then
  157.     set the castNum of sprite 4 to 11
  158.     if the mouseDown then 
  159.       set the castNum of sprite 4 to 3
  160.     end if
  161.   else if the mouseH > 439 and the mouseH < 578 and the mouseV > 168 and the mouseV < 225 then
  162.     set the castNum of sprite 4 to 12
  163.     if the mouseDown then 
  164.       set the castNum of sprite 4 to 3
  165.     end if
  166.   else if the mouseH > 518 and the mouseH < 618 and the mouseV > 75 and the mouseV < 162 then
  167.     set the castNum of sprite 4 to 13
  168.     if the mouseDown then 
  169.       set the castNum of sprite 4 to 3
  170.     end if
  171.   else 
  172.     set the castNum of sprite 4 to 3
  173.   end if
  174.   updateStage   
  175. end rollVLB16
  176.  
  177. on jumpVLB16
  178.   sound stop 1
  179.   if the clickOn < 7 or the clickOn > 23 then
  180.     if the mouseH > 168 and the mouseH < 286 and the mouseV > 75 and the mouseV < 154 then
  181.       puppetSprite 4, FALSE
  182.       go to frame "ltuso930001°°°"
  183.     else if the mouseH > 273 and the mouseH < 392 and the mouseV > 148 and the mouseV < 225 then
  184.       puppetSprite 4, FALSE
  185.       go to frame "ltuso930002°°°"
  186.     else if the mouseH > 380 and the mouseH < 486 and the mouseV > 75 and the mouseV < 161 then
  187.       puppetSprite 4, FALSE
  188.       go to frame "ltuso930003°°°"
  189.     else if the mouseH > 439 and the mouseH < 578 and the mouseV > 168 and the mouseV < 225 then
  190.       puppetSprite 4, FALSE
  191.       go to frame "ltuso930004°°°"
  192.     else if the mouseH > 518 and the mouseH < 618 and the mouseV > 75 and the mouseV < 162 then
  193.       puppetSprite 4, FALSE
  194.       go to frame "ltuso930005°°°"
  195.     else 
  196.       nothing
  197.     end if
  198.   end if
  199.   flush
  200. end jumpVLB16